home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Cream of the Crop 22
/
Cream of the Crop 22.iso
/
os2
/
mtic132o.zip
/
MFM_GER.RAR
/
ANN_BODY.MFM
< prev
next >
Wrap
Text File
|
1996-09-09
|
10KB
|
240 lines
;*****************************************************************
; MegaTIC ANNOUNCE TEMPLATE FILE
; for MegaTIC Copyright (c) by DiMeS 1995,96. All rights reserved.
;*****************************************************************
;
; ■ SCHLÜSSELWÖRTER
;
; Der Doppelpunkt ":" markiert den Beginn eines neuen Abschnittes gefolgt
; von einem Schlüsselwort. Folgende Schlüsselwörter sind gültig:
;
; :ANNHEADER (1) Der Header wird am Anfang einer Announcemail angezeigt
; :AREASTART (2) Der Header einer Area wird zu Begin einer neuen Area
; angezeigt
; :FILELOOP (3) Diese Ausgabe wird für die Dateidarstellung innerhalb
; einer Area verwendet
; :AREAEND (4) Der Areaabschluss wird zum Ende einer Area angezeigt
; :TOTALEND (5) Die Totalstatistik wird zum Ende einer Announcemail
; angezeigt
; :ANNFOOTER (6) Der Footer wird an die Announcemail angehangen
;
;
; Ein Abschitt endet automatisch am Beginn des nächsten Abschnitts, der
; durch ein neues Schlüsselwort festgelegt wird.
;
; ■ MAKROS
;
; Folgende Makros können zum Erstellen der Announcen benutzt werden.
;
; Makroname Funktion Klasse Beispiel
;
; @year Jahresangabe alle 1996
; @monthname Monatsname alle Juni
; @month Monat alle 06
; @dayname Tagesname alle Dienstag
; @day Tag alle 02
; @sysopname Name des Sysop alle Dirk Mertens
; @bbsname Name der BBS alle OxyGEN BBS
; @location Standort der BBS alle Muenster
; @filterdlc Downloadcounter filtern alle
; @filename Name der Datei 3 MTIC121O.RAR
; @filesizekb Dateigrösse in kb 3 653
; @filesize Dateigrösse 3 654.284
; @filedate Dateidatum 3 12/07/96
; @fileday Tag v. Dateidatum 3 12
; @filemonth Monat v. Dateidatum 3 07
; @fileyear Jahr v. Dateidatum 3 1996
; @filedesc 1. Zeile der Beschreibung 3 MegaTIC v1.21
; @overflow Restliche Zeilen der Beschr. 3 (c) Copyright 1995,
; @areaname Name des Dateibereichs 2,3,4 MEGATIC
; @areadesc Beschreibung d. Dateib. 2,3,4 Tools für MegaTIC
; @areanum BBS-Nummer der Filearea 2,3,4 258
; @areasum Anzahl gelisteter Dateien 4 12
; @areasize Summe der Dateiengrössen 4 1.243.435
; @totalsum Anzahl aller Dateien 5,6 143
; @totalsize Summe aller Dateiegrössen 5,6 12.234.234
; @totalareas Anzahl aller Areas 5,6 143
; @mtversion Aktuelle MegaTIC-Version alle MegaTIC+ v1.21
; @origin Origin-Zeile 6 * Origin: MegaTIC !
; @akatouse AKA für dieses Announcement alle 2:2449/528
; @anngroup Name der Announcegruppe alle 2449-NEWFILES
;
;
; ■ FUNKTIONEN
;
; Folgende Funktionen können zur Darstellung bzw. Formatierung eingesetzt
; werden. Dabei wird folgender Syntax verwendet:
;
; str : hier können beliebige Zeichen eingegeben werden
; num : hier muss ein Zahlenwert angegeben werden
; @fkt : hier können verschachtelte Funktionen vorkommen
; def : Vorgabewert, falls Parameter ausgelassen wird
; x|y : entweder x oder y
; [] : wahlweise Parameter
;
;------------------------------------------------------------------------
;
; @format(in,fmt,just,fill) Formatiert einen String
;
; Syntax: @format(@fkt|str,val,[L|C|R],[@fkt|str]);
;
; Parameter: in: String der formatiert werden soll
; format: Länge, auf die der String zu formatieren ist
; just: Ausrichtung L=links R=rechts C=zentriert def:L
; fill: Leerzeichen mit diesem String auffüllen def:" "
;
; Beispiel: Aufruf @format(@day,12,R,-)
; Wirkung formatiere Tagesnummer "09" auf 12 Zeichen
; rechsbündig und fülle mit "-" auf
; Ergebnis ----------09
;
; Beispiel: Aufruf @format(,20,L,@sysopname)
; Wirkung formatiere auf 20 Zeichen linksbündig und
; fülle mit @sysopname (Dirk Mertens)
; Ergebnis Dirk Mertens Dirk Me
;
;------------------------------------------------------------------------
;
; @maxdesclen(len) Besimmt die maximale Breite der
; Dateibeschreibung
; Syntax: @maxdesclen([num])
;
; Parameter: len: Setzt die maximale Breite der Beschreibung auf
; "len" Zeichen. def:78
; Beispiel: Aufruf @maxdesclen(10)
; Wirkung Setzt die maximale Breite der Beschreibung
; auf 10 Zeichen
;
;------------------------------------------------------------------------
;
; @upper(in) Wandelt einen String in Grossbuchstaben um
;
; Syntax: @upper(@fkt|str)
;
; Parameter: in: String, der in Grossuchstaben umgewandelt
; werden soll
;
; Beispiel: Aufruf @upper(Dirk Mertens)
; Wirkung Wandelt "Dirk Mertens" in Grossbuchstaben
; Ergebnis DIRK MERTENS
;
; Beispiel: Aufruf @upper(@dayname)
; Wirkung Wandelt den Namen des Tages in Grossbuchstaben
; Ergebnis DIENSTAG
;
;------------------------------------------------------------------------
;
; @copy(in,from,count) Kopiert Zeichen aus einem String
;
; Syntax: @copy(@fkt|str, @fkt|num, @fkt|num)
;
; Parameter: in: Quellstring, aus dem kopiert werden soll
; from: Kopiere ab dieser Position
; count: Kopiere count Zeichen
;
; Beispiel: Aufruf @copy(Dirk Mertens,2,5)
; Wirkung Kopiert ab der Position 2 aus dem String 5 Zeichen
; Ergebnis irk M
;
; Beispiel: Aufruf @copy(Dirk Mertens,1,@pos(M,Dirk Mertens))
; Wirkung Kopiert ab der Position 1 aus dem String die Anzahl
; Zeichen heraus, die die Funktion @pos angibt.
; Ergebnis Dirk M (@pos liefert den Wert 6, weil "M" an der
; sechsten Stelle in "Dirk Mertens" ist)
;
;------------------------------------------------------------------------
;
; @overflow Bestimmt, an welcher Stelle die
; Ausgabe der Dateibeschreibung beginnt.
; Die Beschreibung wird automatisch
; untereinander dargestellt.
; Syntax: @overflow
;
; Beispiele:
;
;@overflow Die Ausgabe beginnt am linken Rand
; @overflow Dir Ausgabe beginnt 13 Zeichen eingerückt
;
;------------------------------------------------------------------------
;
; @pos(sub,source) Liefert die Position eines Zeichens
; oder Strings in einem anderen String
;
; Syntax: @pos(@fkt|str, @fkt|str)
;
; Parameter: sub: Zeichen/String das/der gesucht werden soll
; source: Suche in diesem String n
;
; Beispiel: Aufruf @pos(e,Dienstag)
; Wirkung Sucht das Zeichen "e" in "Dienstag"
; Ergebnis 3
; Beispiel: Aufruf @pos( ,@sysopname)
; Wirkung Sucht das Leerzeichen " " in @sysopname
; Ergebnis 5 (bei "Dirk Mertens" steht das Leerzeichen an
; der fünften Stelle)
;
;------------------------------------------------------------------------
;
;********************** EXAMPLE FOR ANNOUNCE HEADER ********************
:ANNHEADER
@format(Die folgenden Dateien sind am,78,C)
@format("@dayname, dem @day.@month.@copy(@year,3,2) in der @bbsname",78,C)
@format(für die Gruppe @anngroup eingetroffen:,78,C)
;
;********************** EXAMPLE FOR AREA START *************************
:AREASTART
;
Area: @format(@areaname [@areadesc],70,L)
@format(,78,L,-)
;
;********************** EXAMPLE FOR FILE LOOP **************************
:FILELOOP
;
; Example 1: Display fileinfos with full filesize
;@format(@filename,12,L) @format(@filesize,12,R) @filedate @filedesc
; @overflow
;
; Example 2: Display fileinfos with kb-filesize
@format(@filename,12,L) @format(@filesizekb,7,R)k @filedate @filedesc
@overflow
;
; Example 3: Display fileinfos vertical
;File: @filename
;Size: @filesize bytes
;Date: @fileday.@filemonth.@fileyear
;Desc: @filedesc
; @overflow
;
;********************** EXAMPLE FOR AREA END ***************************
:AREAEND
;
@format(,78,L,-)
@areasize byte(s) in @areasum file(s)
;
;********************** EXAMPLE FOR TOTAL END **************************
:TOTALEND
;
@format(,78,L,=)
Total of @totalsize bytes in @totalsum file(s)
;
;********************** EXAMPLE FOR ANNOUNCE FOOTER ********************
:ANNFOOTER
Filerequests sind 23 Stunden am Tag möglich, ausser von 03:00-04:00.
Mit dem Magic FILES kann eine Gesamtliste der aller Dateien
requestet werden.
Tschau,
@copy(@sysopname,1,@pos( ,@sysopname)) (@akatouse)
--- using @mtversion
@origin
:
;****************************************************************
; END OF TEMPLATE EXAMPLE
;****************************************************************